1 POKE50257,20 2 PRINTCHR$(142);CHR$(8):SI=54272:POKE53280,12:POKE53281,12:PRINT"[147][156]";:PRINT"[182] [206] [206][183][205] [182] [181][183][208][183][183] [206][183][205] [182] [206] [183][208][183][183]":PRINT"[182][206] [180] [167] [182][205] [181] [167] [180] [167] [182][206] [167]":PRINT"[182][205] [180] [167] [182] [205][181] [167] [207][183][208] [182][205] [167] [183][183][183]":PRINT"[182] [205] [205][175][206] [182] [181] [167] [165] [167] [182] [205] [167]":PRINT"":PRINT" [213][195][195][195][195][201]":PRINT" [213][179] [171][195][195][195][195][195][195][195][201]":PRINT" [194][194] [194] [194]" 3 PRINT" [194][171][201] [213][179][213][195][195][195][195][195][201][194]  [207][183][183][183][183][183][183][183][183][183][183][183][183][183][208]":PRINT" [194][194][194] [194][194] [144][166][166][166][166][166] [194]  [165] [158] [146][167][208] ";:PRINT" [194][194][194] [194][194] [144][166][166][166][166][166] [194]  [165] [158] [146][167][170][208]";:PRINT" [194][194][194] [194][194] [194]  [165] [167][170][170]"; 4 PRINT" [194][194][194] [194][194] [144]123[146] [194]  [165] [144]'''' '''[167][170][170]";:PRINT" [194][194][194] [194][194] [144]456[146] [194]  [165][144]:::: ''''' ''[167][170][170]";:PRINT" [194][194][194][160][160][194][194] [144]789[146] [194]  [165][144]:::: '' '''''[167][170][170]";:PRINT" [194][194][194] [194][194] [144]*0#[146] [194]  [204][175][175][175][175][175][175][175][175][175][175][175][175][175][186][170][170]"; 5 PRINT" [194][171][203] [202][179] [144]/ [194] [204][175][175][175][175][175][175][175][175][175][175][175][175][175][186][170]";:PRINT" [194][194] [194] [144] [209] [209]  [194] [204][175][175][175][175][175][175][175][175][175][175][175][175][175][186]";:PRINT" [202][179] [171][195][195][195][195][195][195][195][203]":PRINT" [202][195][195][195][195][203]":PRINT:PRINT"[156] [207][183][183] [206][183][183] [182] [206] [207][183][183]":PRINT" [165] [181] [182][206] [165] " 6 PRINT" [207][183] [181] [182][205] [207][183] ":PRINT" [204][175][175] [205][175][175] [182] [205] [204][175][175]";:GOSUB29:GOSUB30 7 POKE53280,8:POKE53281,8:PRINTCHR$(14);CHR$(8);"[147]":PRINT"[144][195]OMMODORE 64: [158][211]PITZENSOFTWARE AUS ALLEN":PRINT"[194]EREICHEN! Z.[194]. [212]EXT-64/[193]DRESS-64 JE 15":PRINT"[196][205], [195]ALKULATOR-64 25[196][205], [205]AXILISTE 1,30[196][205]";:PRINT"[212].[200]ANNE, [200]ERTASTR.24, 4650 [199]ELSENKIRCHEN";:PRINT" * * * * *" 8 PRINT"[144][211]UCHE [205]ITSTREITER [158]F. [198][207][210][212][200] AUF [195]64. [208]RO-";:PRINT"JEKTE: [212]EXT, [205]INI-[195][193][196]/[195][193][205], [206][195]-[211]TEUERUNG/";:PRINT"[193]UTOMATION, 3[196]-[199]RAPHIK. [211]OEHNHOLZ,":PRINT"[212]EL.: 0511/53 78 46 (AB 17.00 [213]HR)":Z=13:GOSUB49:PRINT"[144][195]64+[214][195]1541 [158][211][212]-[200]OROSKOP-[208]ROGRAMM 69,-[196][205]" 9 PRINT"[211][212]-[197]NTSCHEIDUNGSFINDUNGS-[208]ROGRAMM 89,-[196][205]";:PRINT"[208]. [211]TEINBACH [211]OFTWAREVERTRIEB":PRINT"6100 [196]ARMSTADT, [198]RIEDRICHSTR. 29":PRINT" * * * * *":PRINT"[144][212]ELEFON-[205]ODEM [158]300 [194]D [214]OLLDUPLEX FUER [195]64";:PRINT"MIT AUTOM. [215]AEHLEINRICHTUNG U. [211]OFTWARE" 10 PRINT"[194]AUSATZ 274,24 [196][205] [198]ERTIGGERAET 305,75 [196][205]";:PRINT"[204]INDE [197]LEKTRONIC [211]TOLBERG 02402/24375":T1$="[215]ENN/[201]HRE LODERNDE [195]OMPUTER-[194]EGEISTERUNG/JUENGST/ZUR FLAMMENDEN":T2$="[160][204]EIDENSCHAFT/WURDE/UND/DAS GANZE/GARANTIERT/NICHT ALS [211]TROHFEUER/" 11 T3$="ENDET/HABEN [211]IE/VERMUTLICH/VOR KURZEM/AUS PURER [206]EUGIER/C'T GELESEN":T4$="":T$=T1$+T2$+T3$+T4$:GOSUB47:GOSUB35:IFG$="[218]"ORG$="Z"THEN1 12 POKE53280,8:POKE53281,8:PRINTCHR$(14);"[147]":PRINT"[144][193][203][213][211][212][201][203][203][207][208][208][204][197][210] [158]FUER [195]64 208,-[196][205]":PRINT"[198]ERTIG MONT. IM FORMGERECHTEN [199]EHAEUSE":PRINT"NUR NOCH EINSTECKEN [207]RIG./[193]NS. [193].[211]TOCKEM";:PRINT"[194]ERGHAUSEN 13, 5778 [205]ESCHEDE [212].0291/1221";:PRINT" * * * * *" 13 PRINT"[144][204]ATEINISCHE [214]OKABELN [158][193]BFRAGE/[215]OERTER-":PRINT"BUCH, 1000 LAT.[214]OK., KOMF. [205]ENUEFUEHRUNG";:PRINT"[214]OKABELSCHATZ ERWEITERBAR, [211]PRITES,[212]ON..";:PRINT"[200]EINRICHSMEIER,[207]BERDORF 53,5305 [193]LFTER 4";:Z=13:GOSUB49:PRINT"[144][195]-64 [158] [211]OFT- UND [200]ARDWARE NOCH [205]ASS" 14 PRINT"Z.[194]. [195]ENTRSCHNITTST. FUER JEDEN [196]RUCKER":PRINT"ALLE [195][194][205]-[218]EICHEN MIT [200][210][196][195] 1:1 U. 2:1":PRINT"[195]ENTR. FUER [210][216]/[198][216]-80 [195][208]-80 (O.[203]ABEL)50,-";:PRINT"JEDER ANDERE [196]RUCKER MOEGLICH A.[193].":PRINT"ORGANISATORISCHE [211]OFTWARE F. [194]ETRIEBE" 15 PRINT"U. [197]RSTELLUNG VON SPEZIAL [208]RG.A.[193]NFRAGE":PRINT"[197]PROMKARTE B.64[203] SCHALTB.(O.[197]PROM) 40,-":PRINT"[208]ROBBY-[211]OFT. [208]OSTF.1409, 2720 [210]OTENBURG":T1$="[200]ALLO, [195]OMPUTERFREAKS! [215]OLLT [201]HR [197]UREN [197]LEKTRONIK-[200]ORIZONT" 16 T2$="[160]ERWEITERN? [213]ND AKTUELLE [211]CHALTUNGSTECHNIK KENNENLERNEN, AUCH IN":T3$="[160][198]ORM VON [194]AUANLEITUNGEN? [213]ND ELEKTRONISCH STETS AUF DEM [204]AUFENDEN":T4$="[160]SEIN? [196]ANN LEST ELRAD![160][160][160][160][160][160][160][160][160][160][160][160]":T$=T1$+T2$+T3$+T4$:GOSUB47:FORT=0TO1000:NEXTT 17 T1$="[205]ONAT FUER [205]ONAT IN HANDLICHER [208]APERWARE MIT SCHNELLEM [218]UGRIFF.":T2$="[160][205]IT CA. 820 [203][194]YTE [200]EFTINHALT. [213]ND MIT EXTREM":T3$=" HOCHAUFLOESENDER [199]RAFIK! ELRAD - DAS [205]AGAZIN FUER [197]LEKTRONIK AUS":T4$=" DEM [200]EISE-[214]ERLAG " 18 T$=T1$+T2$+T3$+T4$:GOSUB47:GOSUB35:IFG$="[218]"ORG$="Z"THEN7 19 POKE53280,8:POKE53281,8:PRINTCHR$(14);"[147]":PRINT"[144] [195][160][207][160][205][160][205][160][207][160][196][160][207][160][210][160][197][160] 6 4 ":PRINT"[158] [211]OFTWARE-[197]NTWICKLUNG":PRINT"IN [194][193][211][201][195] MIT [194]ESCHREIBUNG UND [204]ISTINGS":PRINT"[201]NDIVIDUALLOESUNG NACH [193]UFGABENSTELLUNG":PRINT"UND [214]ORGABE SCHNELL UND PREISWERT." 20 PRINT"[203]EINE [211]PIEL- UND [213]NTERHALTUNGSPROGRAMME":PRINT"[203]EINE [212]ELEFONBERATUNG":PRINT"[201]NFO BEI:":PRINT"[193]LEX [208]UETZ, 424 [197]MMERICH, [198]RANKENSTR.11[194]";:Z=13:GOSUB49:PRINT"[144][196]ENKSPIELE[158] UND [205]ATHE. [208]ROGRAMME NUR IN":PRINT"[194][193][211][201][195] GESCHRIEBEN. [198]UER [195]-64 UND [214][195]-20" 21 PRINT"VERFUEGBAR. [200]. [194]ECKER, [203]IRCHGASSE 6":PRINT"6374 [211]TEINBACH/[212]S":PRINT" * * * * *":PRINT"[144]+ + + [195][207][205][205][207][196][207][210][197] UND [193][208][208][204][197] + + +":PRINT"[158][212][197][216][212][197][196] 28,--;[193][196][210][197][211][211] 28,--;[198][193][203][212][213][210] 98,--":PRINT"[198][201][194][213] 48,--;[204][193][199][197][210] 48,--;[205][193][200][206][213][206][199] 98,--;" 22 PRINT"[196][201][208][204].-[205][193][212][200] [204].[200][201][205][197][210],[208][198].466,6308 [194][213][212][218][194][193][195][200]":T1$="[201][206][208][213][212][160]64 ALLE VIER [215]OCHEN NEU AN [201]HREM [203]IOSK. [193]UCH DIE ZWEITE":T2$="[160][193]USGABE VON [160][201][206][208][213][212][160]64 BRINGT WIEDER [193]NWENDERPROGRAMME UND [211]PIELE," 23 T3$="[160][212]IPS UND DEN ZWEITEN [212]EIL DES [203]URSES, [200]ILFSPROGRAMME UND ... ":T4$="":T$=T1$+T2$+T3$+T4$:GOSUB47:GOSUB35:IFG$="[218]"ORG$="Z"THEN12 24 POKE53280,8:POKE53281,8:PRINTCHR$(14);"[147]":PRINT"[144][200]IER [158]KOENNTE AUCH [201]HRE [203]LEINANZEIGE":PRINT"STEHEN.":PRINT:PRINT:PRINT" * * * * *":PRINT"[144][215]ENN [158][211]IE [203]ONTAKTE SUCHEN, [200]ARDWARE ODER":PRINT"[211]OFTWARE ANBIETEN WOLLEN ODER SUCHEN,":PRINT"DANN FUELLEN [211]IE DIE [203][207][206][212][193][203][212][203][193][210][212][197] AUS," 25 PRINT"DIE [211]IE IM [194]EGLEITHEFT FINDEN":Z=13:GOSUB49:PRINT"[144][211]IE [158]KOENNEN FUER [201]HRE [203]ONTAKTANZEIGE":PRINT"ALLE [218]EICHEN DES [160][195]64 VERWENDEN, DIE":PRINT"UEBER DEN '[199]ROSS-[203]LEINSCHRIFT-[205]ODUS'":PRINT"ERREICHBAR SIND!!":PRINT" * * * * *" 26 PRINT"[144][194]ITTE [158]BEACHTEN [211]IE, DASS FUER [213]MLAUTE":PRINT"ZWEI [218]EICHEN BENOETIGT WERDEN.":T1$="[211]IE KOENNEN ENTWEDER EINE [193]NZEIGE MIT 4 ODER MIT 9 [218]EILEN AUFGEBEN.":T2$="":T3$="[160][196]IE FOLGENDEN [208]REISE GELTEN NUR FUER PRIVATE [203]ONTAKTANZEIGEN:" 27 T4$="[160]4 [218]EILEN 10[196][205] / 9 [218]EILEN 20[196][205]":T$=T1$+T2$+T3$+T4$:GOSUB47:GOSUB40:IFG$="[218]"ORG$="Z"THEN19 28 GOTO2:PRINT" * * * * *":END 29 POKESI+24,15:FORI=0TO4:POKESI,40:POKESI+1,234:POKESI+7,130:POKESI+8,110:POKESI+14,20:POKESI+15,117:POKESI+6,240:POKESI+13,240:POKESI+20,240:FORT=0TO500:NEXTT:FORJ=0TO20:POKESI+4,33:POKESI+11,33:POKESI+18,17:POKESI+4,32:POKESI+11,32:POKESI+18,16:NEXTJ:NEXTI:POKESI+24,0:RETURN 30 Z=24:S=0:GOSUB49:PRINT"[144]WEITER =  W [146]";:FORT=0TO200:NEXTT:GETG$:IFG$=""THEN33 31 IFG$="W"ORG$="[215]"THENGOSUB45:GOTO34 32 GOSUB46 33 GOSUB49:PRINT"[144]WEITER = W ";:FORT=0TO200:NEXTT:GOTO30 34 GOSUB49:PRINT" ";:RETURN 35 Z=24:S=0:GOSUB49:PRINT"[144]WEITER =  W [146] ZURUECK =  Z [146]";:FORT=0TO200:NEXTT:GETG$:IFG$=""THEN38 36 IFG$="W"ORG$="[215]"ORG$="Z"ORG$="[218]"THENGOSUB45:GOTO39 37 GOSUB46 38 GOSUB49:PRINT"[144]WEITER = W ZURUECK = Z ";:FORT=0TO200:NEXTT:GOTO35 39 GOSUB49:PRINT" ";:RETURN 40 Z=24:S=0:GOSUB49:PRINT"[144]ANFANG =  A [146] ZURUECK =  Z [146]";:FORT=0TO200:NEXTT:GETG$:IFG$=""THEN43 41 IFG$="A"ORG$="[215]"ORG$="Z"ORG$="[218]"THENGOSUB45:GOTO44 42 GOSUB46 43 GOSUB49:PRINT"[144]ANFANG = A ZURUECK = Z ";:FORT=0TO200:NEXTT:GOTO40 44 GOSUB49:PRINT" ";:RETURN 45 POKESI,59:POKESI+1,139:POKESI+6,240:POKESI+4,17:POKESI+24,15:FORT=0TO100:NEXTT:POKESI+4,0:RETURN 46 POKESI,180:POKESI+1,8:POKESI+6,240:POKESI+4,17:POKESI+24,15:FORT=0TO100:NEXTT:POKESI+4,0:RETURN 47 Z=10:S=2:GOSUB49:PRINT"[144][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162]":Z=11:S=2:GOSUB49:PRINT"[144] ":Z=12:S=2:GOSUB49:PRINT"[144][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162]":T$=" "+T$:FORI=1TOLEN(T$)-28:Z=11:S=5:GOSUB49 48 PRINT"[144]";MID$(T$,I,29):FORZ=0TO100:NEXTZ,I:RETURN 49 POKE214,Z:POKE211,S:SYS58640:PRINT"";:RETURN